home *** CD-ROM | disk | FTP | other *** search
- object Browser: TBrowser
- Left = 364
- Top = 167
- Width = 471
- Height = 352
- Caption = 'CD Database Editor'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Menu = MainMenu1
- OldCreateOrder = False
- Position = poOwnerFormCenter
- OnCanResize = FormCanResize
- OnCloseQuery = FormCloseQuery
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object Label4: TLabel
- Left = 8
- Top = 0
- Width = 26
- Height = 13
- Caption = 'Artist:'
- end
- object tree: TTreeView
- Left = 0
- Top = 0
- Width = 215
- Height = 286
- Align = alClient
- HideSelection = False
- Indent = 19
- PopupMenu = PopupMenu
- ReadOnly = True
- RightClickSelect = True
- TabOrder = 0
- OnChange = treeChange
- OnKeyDown = treeKeyDown
- end
- object StatusBar: TStatusBar
- Left = 0
- Top = 286
- Width = 463
- Height = 20
- Panels = <>
- SimplePanel = False
- end
- object Panel2: TPanel
- Left = 215
- Top = 0
- Width = 248
- Height = 286
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 2
- object TrackLabel: TLabel
- Left = 8
- Top = 184
- Width = 47
- Height = 13
- Caption = 'Track title'
- end
- object ExtTrackLabel: TLabel
- Left = 8
- Top = 224
- Width = 96
- Height = 13
- Caption = 'Extended track data'
- end
- object ArtistLabel: TLabel
- Left = 8
- Top = 0
- Width = 23
- Height = 13
- Caption = 'Artist'
- end
- object TitleLabel: TLabel
- Left = 8
- Top = 40
- Width = 20
- Height = 13
- Caption = 'Title'
- end
- object CategoryLabel: TLabel
- Left = 8
- Top = 80
- Width = 42
- Height = 13
- Caption = 'Category'
- end
- object ExtDiscLabel: TLabel
- Left = 8
- Top = 120
- Width = 91
- Height = 13
- Caption = 'Extended disc data'
- end
- object Track: TEdit
- Left = 8
- Top = 200
- Width = 233
- Height = 21
- TabOrder = 0
- OnChange = TrackChange
- OnKeyDown = TrackKeyDown
- end
- object Artist: TEdit
- Left = 8
- Top = 16
- Width = 233
- Height = 21
- TabOrder = 1
- OnChange = ArtistChange
- end
- object Title: TEdit
- Left = 8
- Top = 56
- Width = 233
- Height = 21
- TabOrder = 2
- OnChange = TitleChange
- end
- object Category: TComboBox
- Left = 8
- Top = 96
- Width = 233
- Height = 21
- ItemHeight = 13
- TabOrder = 3
- OnChange = CategoryChange
- Items.Strings = (
- 'blues'
- 'classical'
- 'country'
- 'data'
- 'folk'
- 'jazz'
- 'misc'
- 'newage'
- 'reggae'
- 'rock'
- 'soundtrack')
- end
- object DiscExt: TMemo
- Left = 8
- Top = 136
- Width = 233
- Height = 45
- Lines.Strings = (
- '')
- TabOrder = 4
- OnChange = DiscExtChange
- end
- object TrackExt: TMemo
- Left = 7
- Top = 240
- Width = 233
- Height = 45
- Lines.Strings = (
- '')
- TabOrder = 5
- OnChange = TrackExtChange
- end
- end
- object MainMenu1: TMainMenu
- Left = 120
- Top = 96
- object File: TMenuItem
- Caption = 'File'
- object Savedatabase: TMenuItem
- Caption = '&Save changes'
- Enabled = False
- OnClick = SavedatabaseClick
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Exit: TMenuItem
- Caption = 'E&xit'
- OnClick = ExitClick
- end
- end
- end
- object PopupMenu: TPopupMenu
- Left = 88
- Top = 72
- object Delete: TMenuItem
- Caption = 'Delete'
- OnClick = DeleteClick
- end
- end
- end
-